home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magnum One
/
Magnum One (Mid-American Digital) (Disc Manufacturing).iso
/
d12
/
v9n17.arc
/
TRUE.SCR
< prev
next >
Wrap
Text File
|
1990-09-12
|
991b
|
34 lines
NTRUE.COM
A100
JMP 170 ;jump over data area to START
F 102 16F '$'
E 150 'Bad parameter'
E 160 'I need DOS 3!'
A170
MOV AX,3000 ;:START
INT 21 ;get DOS version
CMP AL,3
JAE 17E ;if it's 3 or greater, go to OK
MOV DX,160 ;otherwise complain and ..
JMP 19C ;.. go to DONE
XOR BX,BX ;:OK
MOV BL,[0080]
ADD BL,81 ;make filename on command line into
MOV BYTE PTR [BX],00 ;an ASCIIZ string
MOV SI,0082 ;point SI at filename
MOV DI,0102 ;point DI at result area
MOV DX,DI ;point DX at result too
MOV AX,6000
INT 21 ;call true name function
JNC 019C ;If the call succeeded, goto DONE
MOV DX,0150 ;otherwise point to error message
MOV AX,0900 ;:DONE
INT 21 ;print the message pointed to by DX
INT 20
RCX
A3
W
Q